Welcome to Hanmonten

<% num = request.querystring("num") page = request.querystring("page") Set conn=Server.CreateObject("ADODB.Connection") Set rs=Server.CreateObject("ADODB.RecordSet") conn.open "hanmonten", "hanmonten", "4229" sql="select * from han_qna where q_no =" & num rs.open sql, conn, 3 ref = rs("ref") re_level = rs("re_level") re_step = rs("re_step") contents=replace(rs("contents"), chr(13) & chr(10), "
") %> Welcome to Hanmonten

観光案内

申込み書作成

観光 Q&A

	<% if session("adminname") = "hanmonten" then %> pw : <% =rs("pw") %> <% end if%>

タイトル	<% =rs("title") %>
投稿者	"> <% =rs("name") %>	投稿日時	<% =left(rs("q_date"), 10) %>

内容	<% =contents %>

&name=<%=rs("name")%>">

<% sql="update han_qna set visited = visited + 1 where q_no =" & rs("q_no") conn.execute(sql) %>